home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2010 April / PCWorld0410.iso / hity wydania / Ubuntu 9.10 PL / karmelkowy-koliberek-desktop-9.10-i386-PL.iso / casper / filesystem.squashfs / usr / lib / perl / 5.10.0 / features.ph < prev    next >
Text File  |  2009-10-01  |  13KB  |  203 lines

  1. require '_h2ph_pre.ph';
  2.  
  3. no warnings qw(redefine misc);
  4.  
  5. unless(defined(&_FEATURES_H)) {
  6.     eval 'sub _FEATURES_H () {1;}' unless defined(&_FEATURES_H);
  7.     undef(&__USE_ISOC99) if defined(&__USE_ISOC99);
  8.     undef(&__USE_ISOC95) if defined(&__USE_ISOC95);
  9.     undef(&__USE_POSIX) if defined(&__USE_POSIX);
  10.     undef(&__USE_POSIX2) if defined(&__USE_POSIX2);
  11.     undef(&__USE_POSIX199309) if defined(&__USE_POSIX199309);
  12.     undef(&__USE_POSIX199506) if defined(&__USE_POSIX199506);
  13.     undef(&__USE_XOPEN) if defined(&__USE_XOPEN);
  14.     undef(&__USE_XOPEN_EXTENDED) if defined(&__USE_XOPEN_EXTENDED);
  15.     undef(&__USE_UNIX98) if defined(&__USE_UNIX98);
  16.     undef(&__USE_XOPEN2K) if defined(&__USE_XOPEN2K);
  17.     undef(&__USE_XOPEN2K8) if defined(&__USE_XOPEN2K8);
  18.     undef(&__USE_LARGEFILE) if defined(&__USE_LARGEFILE);
  19.     undef(&__USE_LARGEFILE64) if defined(&__USE_LARGEFILE64);
  20.     undef(&__USE_FILE_OFFSET64) if defined(&__USE_FILE_OFFSET64);
  21.     undef(&__USE_BSD) if defined(&__USE_BSD);
  22.     undef(&__USE_SVID) if defined(&__USE_SVID);
  23.     undef(&__USE_MISC) if defined(&__USE_MISC);
  24.     undef(&__USE_ATFILE) if defined(&__USE_ATFILE);
  25.     undef(&__USE_GNU) if defined(&__USE_GNU);
  26.     undef(&__USE_REENTRANT) if defined(&__USE_REENTRANT);
  27.     undef(&__USE_FORTIFY_LEVEL) if defined(&__USE_FORTIFY_LEVEL);
  28.     undef(&__FAVOR_BSD) if defined(&__FAVOR_BSD);
  29.     undef(&__KERNEL_STRICT_NAMES) if defined(&__KERNEL_STRICT_NAMES);
  30.     unless(defined(&_LOOSE_KERNEL_NAMES)) {
  31.     eval 'sub __KERNEL_STRICT_NAMES () {1;}' unless defined(&__KERNEL_STRICT_NAMES);
  32.     }
  33.     eval 'sub __USE_ANSI () {1;}' unless defined(&__USE_ANSI);
  34.     if(defined (defined(&__GNUC__) ? &__GNUC__ : undef)  && defined (defined(&__GNUC_MINOR__) ? &__GNUC_MINOR__ : undef)) {
  35.     eval 'sub __GNUC_PREREQ {
  36.         my($maj, $min) = @_;
  37.             eval q((( &__GNUC__ << 16) +  &__GNUC_MINOR__ >= (($maj) << 16) + ($min)));
  38.     }' unless defined(&__GNUC_PREREQ);
  39.     } else {
  40.     eval 'sub __GNUC_PREREQ {
  41.         my($maj, $min) = @_;
  42.             eval q(0);
  43.     }' unless defined(&__GNUC_PREREQ);
  44.     }
  45.     if(defined (defined(&_BSD_SOURCE) ? &_BSD_SOURCE : undef)  && !(defined (defined(&_POSIX_SOURCE) ? &_POSIX_SOURCE : undef) || defined (defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef) || defined (defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef) || defined (defined(&_XOPEN_SOURCE_EXTENDED) ? &_XOPEN_SOURCE_EXTENDED : undef) || defined (defined(&_GNU_SOURCE) ? &_GNU_SOURCE : undef) || defined (defined(&_SVID_SOURCE) ? &_SVID_SOURCE : undef))) {
  46.     eval 'sub __FAVOR_BSD () {1;}' unless defined(&__FAVOR_BSD);
  47.     }
  48.     if(defined(&_GNU_SOURCE)) {
  49.     undef(&_ISOC99_SOURCE) if defined(&_ISOC99_SOURCE);
  50.     eval 'sub _ISOC99_SOURCE () {1;}' unless defined(&_ISOC99_SOURCE);
  51.     undef(&_POSIX_SOURCE) if defined(&_POSIX_SOURCE);
  52.     eval 'sub _POSIX_SOURCE () {1;}' unless defined(&_POSIX_SOURCE);
  53.     undef(&_POSIX_C_SOURCE) if defined(&_POSIX_C_SOURCE);
  54.     eval 'sub _POSIX_C_SOURCE () {200809;}' unless defined(&_POSIX_C_SOURCE);
  55.     undef(&_XOPEN_SOURCE) if defined(&_XOPEN_SOURCE);
  56.     eval 'sub _XOPEN_SOURCE () {700;}' unless defined(&_XOPEN_SOURCE);
  57.     undef(&_XOPEN_SOURCE_EXTENDED) if defined(&_XOPEN_SOURCE_EXTENDED);
  58.     eval 'sub _XOPEN_SOURCE_EXTENDED () {1;}' unless defined(&_XOPEN_SOURCE_EXTENDED);
  59.     undef(&_LARGEFILE64_SOURCE) if defined(&_LARGEFILE64_SOURCE);
  60.     eval 'sub _LARGEFILE64_SOURCE () {1;}' unless defined(&_LARGEFILE64_SOURCE);
  61.     undef(&_BSD_SOURCE) if defined(&_BSD_SOURCE);
  62.     eval 'sub _BSD_SOURCE () {1;}' unless defined(&_BSD_SOURCE);
  63.     undef(&_SVID_SOURCE) if defined(&_SVID_SOURCE);
  64.     eval 'sub _SVID_SOURCE () {1;}' unless defined(&_SVID_SOURCE);
  65.     undef(&_ATFILE_SOURCE) if defined(&_ATFILE_SOURCE);
  66.     eval 'sub _ATFILE_SOURCE () {1;}' unless defined(&_ATFILE_SOURCE);
  67.     }
  68.     if((!defined (defined(&__STRICT_ANSI__) ? &__STRICT_ANSI__ : undef)  && !defined (defined(&_ISOC99_SOURCE) ? &_ISOC99_SOURCE : undef)  && !defined (defined(&_POSIX_SOURCE) ? &_POSIX_SOURCE : undef)  && !defined (defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef)  && !defined (defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef)  && !defined (defined(&_XOPEN_SOURCE_EXTENDED) ? &_XOPEN_SOURCE_EXTENDED : undef)  && !defined (defined(&_BSD_SOURCE) ? &_BSD_SOURCE : undef)  && !defined (defined(&_SVID_SOURCE) ? &_SVID_SOURCE : undef))) {
  69.     eval 'sub _BSD_SOURCE () {1;}' unless defined(&_BSD_SOURCE);
  70.     eval 'sub _SVID_SOURCE () {1;}' unless defined(&_SVID_SOURCE);
  71.     }
  72.     if((defined (defined(&_ISOC99_SOURCE) ? &_ISOC99_SOURCE : undef) || defined (defined(&_ISOC9X_SOURCE) ? &_ISOC9X_SOURCE : undef) || (defined (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef)  && (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef) >= 199901))) {
  73.     eval 'sub __USE_ISOC99 () {1;}' unless defined(&__USE_ISOC99);
  74.     }
  75.     if((defined (defined(&_ISOC99_SOURCE) ? &_ISOC99_SOURCE : undef) || defined (defined(&_ISOC9X_SOURCE) ? &_ISOC9X_SOURCE : undef) || (defined (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef)  && (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef) >= 199409))) {
  76.     eval 'sub __USE_ISOC95 () {1;}' unless defined(&__USE_ISOC95);
  77.     }
  78.     if(((!defined (defined(&__STRICT_ANSI__) ? &__STRICT_ANSI__ : undef) || ((defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef) - 0) >= 500)  && !defined (defined(&_POSIX_SOURCE) ? &_POSIX_SOURCE : undef)  && !defined (defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef))) {
  79.     eval 'sub _POSIX_SOURCE () {1;}' unless defined(&_POSIX_SOURCE);
  80.     if(defined (defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef)  && ((defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef) - 0) < 500) {
  81.         eval 'sub _POSIX_C_SOURCE () {2;}' unless defined(&_POSIX_C_SOURCE);
  82.     }
  83.  elsif(defined (defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef)  && ((defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef) - 0) < 600) {
  84.         eval 'sub _POSIX_C_SOURCE () {199506;}' unless defined(&_POSIX_C_SOURCE);
  85.     }
  86.  elsif(defined (defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef)  && ((defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef) - 0) < 700) {
  87.         eval 'sub _POSIX_C_SOURCE () {200112;}' unless defined(&_POSIX_C_SOURCE);
  88.     } else {
  89.         eval 'sub _POSIX_C_SOURCE () {200809;}' unless defined(&_POSIX_C_SOURCE);
  90.     }
  91.     eval 'sub __USE_POSIX_IMPLICITLY () {1;}' unless defined(&__USE_POSIX_IMPLICITLY);
  92.     }
  93.     if(defined (defined(&_POSIX_SOURCE) ? &_POSIX_SOURCE : undef) || (defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef) >= 1|| defined (defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef)) {
  94.     eval 'sub __USE_POSIX () {1;}' unless defined(&__USE_POSIX);
  95.     }
  96.     if(defined (defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef)  && (defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef) >= 2|| defined (defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef)) {
  97.     eval 'sub __USE_POSIX2 () {1;}' unless defined(&__USE_POSIX2);
  98.     }
  99.     if(((defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef) - 0) >= 199309) {
  100.     eval 'sub __USE_POSIX199309 () {1;}' unless defined(&__USE_POSIX199309);
  101.     }
  102.     if(((defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef) - 0) >= 199506) {
  103.     eval 'sub __USE_POSIX199506 () {1;}' unless defined(&__USE_POSIX199506);
  104.     }
  105.     if(((defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef) - 0) >= 200112) {
  106.     eval 'sub __USE_XOPEN2K () {1;}' unless defined(&__USE_XOPEN2K);
  107.     undef(&__USE_ISOC99) if defined(&__USE_ISOC99);
  108.     eval 'sub __USE_ISOC99 () {1;}' unless defined(&__USE_ISOC99);
  109.     }
  110.     if(((defined(&_POSIX_C_SOURCE) ? &_POSIX_C_SOURCE : undef) - 0) >= 200809) {
  111.     eval 'sub __USE_XOPEN2K8 () {1;}' unless defined(&__USE_XOPEN2K8);
  112.     undef(&_ATFILE_SOURCE) if defined(&_ATFILE_SOURCE);
  113.     eval 'sub _ATFILE_SOURCE () {1;}' unless defined(&_ATFILE_SOURCE);
  114.     }
  115.     if(defined(&_XOPEN_SOURCE)) {
  116.     eval 'sub __USE_XOPEN () {1;}' unless defined(&__USE_XOPEN);
  117.     if(((defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef) - 0) >= 500) {
  118.         eval 'sub __USE_XOPEN_EXTENDED () {1;}' unless defined(&__USE_XOPEN_EXTENDED);
  119.         eval 'sub __USE_UNIX98 () {1;}' unless defined(&__USE_UNIX98);
  120.         undef(&_LARGEFILE_SOURCE) if defined(&_LARGEFILE_SOURCE);
  121.         eval 'sub _LARGEFILE_SOURCE () {1;}' unless defined(&_LARGEFILE_SOURCE);
  122.         if(((defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef) - 0) >= 600) {
  123.         if(((defined(&_XOPEN_SOURCE) ? &_XOPEN_SOURCE : undef) - 0) >= 700) {
  124.             eval 'sub __USE_XOPEN2K8 () {1;}' unless defined(&__USE_XOPEN2K8);
  125.         }
  126.         eval 'sub __USE_XOPEN2K () {1;}' unless defined(&__USE_XOPEN2K);
  127.         undef(&__USE_ISOC99) if defined(&__USE_ISOC99);
  128.         eval 'sub __USE_ISOC99 () {1;}' unless defined(&__USE_ISOC99);
  129.         }
  130.     } else {
  131.         if(defined(&_XOPEN_SOURCE_EXTENDED)) {
  132.         eval 'sub __USE_XOPEN_EXTENDED () {1;}' unless defined(&__USE_XOPEN_EXTENDED);
  133.         }
  134.     }
  135.     }
  136.     if(defined(&_LARGEFILE_SOURCE)) {
  137.     eval 'sub __USE_LARGEFILE () {1;}' unless defined(&__USE_LARGEFILE);
  138.     }
  139.     if(defined(&_LARGEFILE64_SOURCE)) {
  140.     eval 'sub __USE_LARGEFILE64 () {1;}' unless defined(&__USE_LARGEFILE64);
  141.     }
  142.     if(defined (defined(&_FILE_OFFSET_BITS) ? &_FILE_OFFSET_BITS : undef)  && (defined(&_FILE_OFFSET_BITS) ? &_FILE_OFFSET_BITS : undef) == 64) {
  143.     eval 'sub __USE_FILE_OFFSET64 () {1;}' unless defined(&__USE_FILE_OFFSET64);
  144.     }
  145.     if(defined (defined(&_BSD_SOURCE) ? &_BSD_SOURCE : undef) || defined (defined(&_SVID_SOURCE) ? &_SVID_SOURCE : undef)) {
  146.     eval 'sub __USE_MISC () {1;}' unless defined(&__USE_MISC);
  147.     }
  148.     if(defined(&_BSD_SOURCE)) {
  149.     eval 'sub __USE_BSD () {1;}' unless defined(&__USE_BSD);
  150.     }
  151.     if(defined(&_SVID_SOURCE)) {
  152.     eval 'sub __USE_SVID () {1;}' unless defined(&__USE_SVID);
  153.     }
  154.     if(defined(&_ATFILE_SOURCE)) {
  155.     eval 'sub __USE_ATFILE () {1;}' unless defined(&__USE_ATFILE);
  156.     }
  157.     if(defined(&_GNU_SOURCE)) {
  158.     eval 'sub __USE_GNU () {1;}' unless defined(&__USE_GNU);
  159.     }
  160.     if(defined (defined(&_REENTRANT) ? &_REENTRANT : undef) || defined (defined(&_THREAD_SAFE) ? &_THREAD_SAFE : undef)) {
  161.     eval 'sub __USE_REENTRANT () {1;}' unless defined(&__USE_REENTRANT);
  162.     }
  163.     if(defined (defined(&_FORTIFY_SOURCE) ? &_FORTIFY_SOURCE : undef)  && (defined(&_FORTIFY_SOURCE) ? &_FORTIFY_SOURCE : undef) > 0 &&  &__GNUC_PREREQ (4, 1)  && defined (defined(&__OPTIMIZE__) ? &__OPTIMIZE__ : undef)  && (defined(&__OPTIMIZE__) ? &__OPTIMIZE__ : undef) > 0) {
  164.     if((defined(&_FORTIFY_SOURCE) ? &_FORTIFY_SOURCE : undef) > 1) {
  165.         eval 'sub __USE_FORTIFY_LEVEL () {2;}' unless defined(&__USE_FORTIFY_LEVEL);
  166.     } else {
  167.         eval 'sub __USE_FORTIFY_LEVEL () {1;}' unless defined(&__USE_FORTIFY_LEVEL);
  168.     }
  169.     } else {
  170.     eval 'sub __USE_FORTIFY_LEVEL () {0;}' unless defined(&__USE_FORTIFY_LEVEL);
  171.     }
  172.     require 'bits/predefs.ph';
  173.     eval 'sub __STDC_ISO_10646__ () {200009;}' unless defined(&__STDC_ISO_10646__);
  174.     undef(&__GNU_LIBRARY__) if defined(&__GNU_LIBRARY__);
  175.     eval 'sub __GNU_LIBRARY__ () {6;}' unless defined(&__GNU_LIBRARY__);
  176.     eval 'sub __GLIBC__ () {2;}' unless defined(&__GLIBC__);
  177.     eval 'sub __GLIBC_MINOR__ () {10;}' unless defined(&__GLIBC_MINOR__);
  178.     eval 'sub __GLIBC_PREREQ {
  179.         my($maj, $min) = @_;
  180.         eval q((( &__GLIBC__ << 16) +  &__GLIBC_MINOR__ >= (($maj) << 16) + ($min)));
  181.     }' unless defined(&__GLIBC_PREREQ);
  182.     if(defined (defined(&__GNUC__) ? &__GNUC__ : undef) || (defined (defined(&__PGI) ? &__PGI : undef)  && defined (defined(&__i386__) ? &__i386__ : undef) ) || (defined (defined(&__INTEL_COMPILER) ? &__INTEL_COMPILER : undef)  && (defined (defined(&__i386__) ? &__i386__ : undef) || defined (defined(&__ia64__) ? &__ia64__ : undef))) || (defined (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef)  && (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef) >= 199901)) {
  183.     eval 'sub __GLIBC_HAVE_LONG_LONG () {1;}' unless defined(&__GLIBC_HAVE_LONG_LONG);
  184.     }
  185.     unless(defined(&__ASSEMBLER__)) {
  186.     unless(defined(&_SYS_CDEFS_H)) {
  187.         require 'sys/cdefs.ph';
  188.     }
  189.     if(defined (defined(&__USE_FILE_OFFSET64) ? &__USE_FILE_OFFSET64 : undef)  && !defined (defined(&__REDIRECT) ? &__REDIRECT : undef)) {
  190.         eval 'sub __USE_LARGEFILE () {1;}' unless defined(&__USE_LARGEFILE);
  191.         eval 'sub __USE_LARGEFILE64 () {1;}' unless defined(&__USE_LARGEFILE64);
  192.     }
  193.     }
  194.     if( &__GNUC_PREREQ (2, 7)  && defined (defined(&__OPTIMIZE__) ? &__OPTIMIZE__ : undef)  && !defined (defined(&__OPTIMIZE_SIZE__) ? &__OPTIMIZE_SIZE__ : undef)  && !defined (defined(&__NO_INLINE__) ? &__NO_INLINE__ : undef)  && defined (defined(&__extern_inline) ? &__extern_inline : undef)) {
  195.     eval 'sub __USE_EXTERN_INLINES () {1;}' unless defined(&__USE_EXTERN_INLINES);
  196.     }
  197.     if( &__GNUC_PREREQ (2, 7)  && defined (defined(&__OPTIMIZE__) ? &__OPTIMIZE__ : undef)  && (defined (defined(&_LIBC) ? &_LIBC : undef) || !defined (defined(&__OPTIMIZE_SIZE__) ? &__OPTIMIZE_SIZE__ : undef))  && !defined (defined(&__NO_INLINE__) ? &__NO_INLINE__ : undef)  && defined (defined(&__extern_inline) ? &__extern_inline : undef)) {
  198.     eval 'sub __USE_EXTERN_INLINES_IN_LIBC () {1;}' unless defined(&__USE_EXTERN_INLINES_IN_LIBC);
  199.     }
  200.     require 'gnu/stubs.ph';
  201. }
  202. 1;
  203.